501 Great Games/501 Great Games - Volume One (2001)(Guildhall Leisure Services).iso/PENCILS1/_SETUP.1/CALENDAR.EXE/0/RCDATA/TFORM1/TFORM1.txt

Text File | 1998-06-29 | 6KB | 278 lines

object Form1: TForm1
  Left = 257
  Top = 173
  Width = 626
  Height = 476
  HelpContext = 1
  HorzScrollBar.Visible = False
  BorderIcons = [biSystemMenu]
  Caption = 'Calendar'
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Menu = MainMenu1
  Position = poScreenCenter
  OnActivate = FormActivate
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Month: TLabel
    Left = 8
    Top = 3
    Width = 30
    Height = 13
    Caption = 'Month'
  end
  object Year: TLabel
    Left = 208
    Top = 3
    Width = 22
    Height = 13
    Caption = 'Year'
  end
  object Image2: TImage
    Left = 368
    Top = 8
    Width = 200
    Height = 32
    AutoSize = True
    Picture.Data = {<image001.bmp>}
    Visible = False
  end
  object Image3: TImage
    Left = 294
    Top = 24
    Width = 60
    Height = 57
    AutoSize = True
    Picture.Data = {<image002.bmp>}
    Visible = False
  end
  object Image4: TImage
    Left = 384
    Top = 0
    Width = 60
    Height = 60
    AutoSize = True
    Picture.Data = {<image003.bmp>}
    Visible = False
  end
  object Image5: TImage
    Left = 200
    Top = 0
    Width = 60
    Height = 61
    AutoSize = True
    Picture.Data = {<image004.bmp>}
    Visible = False
  end
  object Edit1: TEdit
    Left = 240
    Top = 0
    Width = 41
    Height = 21
    TabOrder = 0
    Text = '1997'
    OnChange = Edit1Change
  end
  object UpDown1: TUpDown
    Left = 281
    Top = 0
    Width = 15
    Height = 21
    Associate = Edit1
    Min = 1900
    Max = 2200
    Position = 1997
    TabOrder = 1
    Thousands = False
    Wrap = False
  end
  object ComboBox1: TComboBox
    Left = 48
    Top = 0
    Width = 145
    Height = 21
    ItemHeight = 13
    TabOrder = 2
    OnChange = ComboBox1Change
  end
  object Panel1: TPanel
    Left = 5
    Top = 24
    Width = 610
    Height = 402
    BevelInner = bvLowered
    Color = clWhite
    TabOrder = 3
    object Image1: TImage
      Left = 2
      Top = 2
      Width = 606
      Height = 398
      Align = alClient
    end
    object Image6: TImage
      Left = 184
      Top = 96
      Width = 60
      Height = 60
      AutoSize = True
      Picture.Data = {<image005.bmp>}
      Visible = False
    end
    object Image7: TImage
      Left = 290
      Top = 98
      Width = 60
      Height = 60
      AutoSize = True
      Picture.Data = {<image006.bmp>}
      Visible = False
    end
  end
  object Memo1: TMemo
    Left = 144
    Top = 440
    Width = 185
    Height = 89
    TabOrder = 4
    Visible = False
  end
  object MainMenu1: TMainMenu
    Left = 592
    Top = 65528
    object File1: TMenuItem
      Caption = '&File'
      ShortCut = 0
      object New1: TMenuItem
        Caption = '&New'
        HelpContext = 5
        ShortCut = 0
        OnClick = New1Click
      end
      object Open1: TMenuItem
        Caption = '&Open'
        HelpContext = 5
        ShortCut = 0
        OnClick = Open1Click
      end
      object Save1: TMenuItem
        Caption = '&Save'
        HelpContext = 5
        ShortCut = 0
        OnClick = Save1Click
      end
      object SaveAs1: TMenuItem
        Caption = 'Save &As'
        HelpContext = 5
        ShortCut = 0
        OnClick = SaveAs1Click
      end
      object N1: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Print1: TMenuItem
        Caption = '&Print'
        HelpContext = 6
        ShortCut = 0
        OnClick = Print1Click
      end
      object PageSetup1: TMenuItem
        Caption = 'P&rinter Setup'
        HelpContext = 6
        ShortCut = 0
        OnClick = PageSetup1Click
      end
      object N2: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Exit1: TMenuItem
        Caption = 'E&xit'
        HelpContext = 1
        ShortCut = 0
        OnClick = Exit1Click
      end
    end
    object Calendar1: TMenuItem
      Caption = '&Calendar'
      ShortCut = 0
      object AddLabel1: TMenuItem
        Caption = 'Add &Label'
        HelpContext = 3
        ShortCut = 0
        OnClick = AddLabel1Click
      end
      object EditLabels1: TMenuItem
        Caption = '&Edit Labels'
        HelpContext = 4
        ShortCut = 0
        OnClick = EditLabels1Click
      end
      object Title1: TMenuItem
        Caption = '&Title'
        HelpContext = 3
        ShortCut = 0
        OnClick = Title1Click
      end
      object CalendarCharacters1: TMenuItem
        Caption = 'Calendar &Characters'
        ShortCut = 0
        OnClick = CalendarCharacters1Click
      end
      object N3: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object GenerateCalendar1: TMenuItem
        Caption = '&Generate Calendar'
        HelpContext = 2
        ShortCut = 0
        OnClick = GenerateCalendar1Click
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      ShortCut = 0
      object Contents1: TMenuItem
        Caption = '&Index'
        ShortCut = 112
        OnClick = Contents1Click
      end
      object ABout1: TMenuItem
        Caption = '&About the Calendar'
        ShortCut = 0
        OnClick = ABout1Click
      end
    end
  end
  object psetup: TPrinterSetupDialog
    Left = 368
    Top = 480
  end
  object PrintDialog1: TPrintDialog
    Left = 56
    Top = 448
  end
  object OpenDialog1: TOpenDialog
    DefaultExt = 'cal'
    FileEditStyle = fsEdit
    Filter = 'Calendar files|*.cal|All files|*.*'
    Options = [ofHideReadOnly, ofFileMustExist]
    Left = 432
    Top = 432
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = 'cal'
    FileEditStyle = fsEdit
    Filter = 'Calendar Files|*.cal|All files|*.*'
    Options = [ofHideReadOnly]
    Left = 488
    Top = 432
  end
end